home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / wva____1.p2s < prev    next >
Encoding:
Text File  |  1994-04-27  |  1.7 KB  |  86 lines
  1. # Description:
  2. #
  3. # Open a single instance of the digital audio player, load,
  4. # cue, change volume and close.
  5. #
  6. ###########################################################################
  7.  
  8. ############################################
  9. #
  10. #   OPEN THE DIGITAL AUDIO PLAYER
  11. #   WAIT FOR SUCCESSFUL OPEN
  12. #
  13. ############################################
  14.  
  15. open waveaudio00 alias wave1 notify
  16. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  17. @WAIT_NOTIFY 1 45000
  18.  
  19. acquire wave1
  20. @WAIT_PASSDEVICE wave1
  21.  
  22. ############################################
  23. #
  24. #   LOAD AND CUE 16B11KS.WAV FILE
  25. #   CHANGE VOLUME FROM 0% to 100%
  26. #
  27. ############################################
  28.  
  29. load wave1 ?AP2PATH?16B11KS.WAV notify
  30. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD #2
  31. @WAIT_NOTIFY 2 30000
  32. status wave1 mode wait
  33. =stopped
  34.  
  35. cue wave1 output notify
  36. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #3
  37. @WAIT_NOTIFY 3 30000
  38.  
  39. set wave1 audio volume 0
  40. status wave1 volume wait
  41. =0:0
  42.  
  43. set wave1 audio volume 10
  44. status wave1 volume wait
  45. =10:10
  46.  
  47. set wave1 audio volume 20
  48. status wave1 volume wait
  49. =20:20
  50.  
  51. set wave1 audio volume 30
  52. status wave1 volume wait
  53. =30:30
  54.  
  55. set wave1 audio volume 40
  56. status wave1 volume wait
  57. =40:40
  58.  
  59. set wave1 audio volume 50
  60. status wave1 volume wait
  61. =50:50
  62.  
  63. set wave1 audio volume 60
  64. status wave1 volume wait
  65. =60:60
  66.  
  67. set wave1 audio volume 70
  68. status wave1 volume wait
  69. =70:70
  70.  
  71. set wave1 audio volume 80
  72. status wave1 volume wait
  73. =80:80
  74.  
  75. set wave1 audio volume 90
  76. status wave1 volume wait
  77. =90:90
  78.  
  79. set wave1 audio volume 100
  80. status wave1 volume wait
  81. =100:100
  82.  
  83. close wave1 notify
  84. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #4
  85. @WAIT_NOTIFY 4 30000
  86.